home *** CD-ROM | disk | FTP | other *** search
/ cyber.net interactivo 3 / inter@ivo 1996-04.iso / cybint3 / bin / milia.dxr / 00017.ls < prev    next >
Encoding:
Text File  |  1996-03-22  |  713 b   |  35 lines
  1. on exitFrame
  2.   if rollOver(2) then
  3.     set the visible of sprite 2 to 1
  4.     if soundBusy(2) = 0 then
  5.       sound playFile 2, "..\som\bebe.wav"
  6.     end if
  7.   else
  8.     set the visible of sprite 2 to 0
  9.   end if
  10.   if rollOver(3) then
  11.     set the visible of sprite 3 to 1
  12.     if soundBusy(2) = 0 then
  13.       sound playFile 2, "..\som\zap.wav"
  14.     end if
  15.   else
  16.     set the visible of sprite 3 to 0
  17.   end if
  18.   go(the frame)
  19. end
  20.  
  21. on mouseUp
  22.   if rollOver(2) then
  23.     set the visible of sprite 2 to 1
  24.     set the visible of sprite 3 to 1
  25.     go("Bebe")
  26.   else
  27.     if rollOver(3) then
  28.       sound stop 1
  29.       set the visible of sprite 2 to 1
  30.       set the visible of sprite 3 to 1
  31.       go("Milia")
  32.     end if
  33.   end if
  34. end
  35.